home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 December / Chip_2003-12_cd1.bin / program / ctenari / ShiCola / CodePad37.exe / $INSTDIR / Syntax Definitions / foxpro.def < prev    next >
Encoding:
Text File  |  2003-10-17  |  7.8 KB  |  253 lines
  1. object TPersHolder
  2.   P.Name = 'FoxPro'
  3.   P.Extensions.Strings = (
  4.     'FoxPro files (*.prg;*.spr)|*.prg;*.spr')
  5.   P.SyntaxBlocks = <
  6.     item
  7.       Name = 'Default'
  8.       ID = 0
  9.       FIText = 0
  10.       FIIntNum = 1
  11.       FIFloatNum = 2
  12.       FIHexNum = 3
  13.       FIDirective = 4
  14.       FISymbol = 14
  15.       UseSymbols = True
  16.       UseLineDirectives = True
  17.       UseComments = True
  18.       UseSingleLineComments = True
  19.       UseFullLineComments = True
  20.       UseStrings = True
  21.       UseSingleLineStrings = True
  22.       UseNumbers = True
  23.       UseSuffixedNumbers = True
  24.       UseMultipleNumSuffixes = False
  25.       UsePrefixedSuffixedIdentifiers = True
  26.       UseKeywords = True
  27.       BlockDelimiters = <>
  28.       LineDirectivePrefix = '#'
  29.       SingleLineCommentDelimiters = <
  30.         item
  31.           FontID = 5
  32.           LeftDelimiter = '&&'
  33.         end>
  34.       FullLineCommentDelimiters = <
  35.         item
  36.           FontID = 6
  37.           LeftDelimiter = '*'
  38.         end
  39.         item
  40.           FontID = 7
  41.           LeftDelimiter = 'c'
  42.         end
  43.         item
  44.           FontID = 8
  45.           LeftDelimiter = '/'
  46.         end
  47.         item
  48.           FontID = 9
  49.           LeftDelimiter = '???'
  50.         end>
  51.       SingleLineStringDelimiters = <
  52.         item
  53.           FontID = 10
  54.           LeftDelimiter = '"'
  55.           RightDelimiter = '"'
  56.         end
  57.         item
  58.           FontID = 11
  59.           LeftDelimiter = #39
  60.           RightDelimiter = #39
  61.         end>
  62.       NumSuffixes = <
  63.         item
  64.           LeftDelimiter = 'f'
  65.         end>
  66.       IdentPrefixesSuffixes = <
  67.         item
  68.           LeftDelimiter = '.'
  69.           RightDelimiter = '.'
  70.         end>
  71.       KeywordSets = <
  72.         item
  73.           FontID = 15
  74.           Name = 'Commands'
  75.           Keywords =
  76.             'ACCEPT,ACTIVATE,ADD,ALL,ALTER,ALTERNATE,ANSI,APLABOUT,APP,APPEND' +
  77.             ',ARRAY,AS,ASSIST,AUTOSAVE,AVERAGE,BAR,BEGIN,BELL,BLANK,BLINK,BLO' +
  78.             'CKSIZE,BORDER,BOX,BROWSE,BRSTATUS,BUILD,CALCULATE,CALL,CANCEL,CA' +
  79.             'RRY,CASE,CD,CENTURY,CHANGE,CHDIR,CLASS,CLASSLIB,CLEAR,CLOCK,CLOS' +
  80.             'E,COLLATE,COLOR,COMMAND,COMPATIBLE,COMPILE,CONFIRM,CONNECTION,CO' +
  81.             'NNECTIONS,CONSOLE,CONTINUE,COPY,COUNT,CPCOMPILE,CPDIALOG,CREATE,' +
  82.             'CURRENCY,CURSOR,DATA,DATABASE,DATABASES,DATASESSION,DATE,DEACTIV' +
  83.             'ATE,DEBUG,DECIMALS,DECLARE,DEFAULT,DEFINE,DELETE,DELETED,DELIMIT' +
  84.             'ERS,DEVELOPMENT,DEVICE,DIMENSION,DIR,DIRECTORY,DISPLAY,DLLS,DO,D' +
  85.             'OHISTORY,ECHO,EDIT,EJECT,ELSE,END,ENDCASE,ENDDEFINE,ENDDO,ENDFOR' +
  86.             ',ENDFUNC,ENDIF,ENDPRINTJOB,ENDPROC,ENDSCAN,ENDWITH,ERASE,ERROR,E' +
  87.             'SCAPE,EVENTS,EXACT,EXCLUSIVE,EXE,EXIT,EXPORT,EXTENDED,EXTERNAL,F' +
  88.             'DOW,FIELDS,FILE,FILER,FILES,FILTER,FIND,FIXED,FLUSH,FOR,FORM,FOR' +
  89.             'MAT,FREE,FROM,FULLPATH,FUNCTION,FWEEK,GATHER,GENERAL,GET,GETEXPR' +
  90.             ',GETS,GO,GOTO,HEADINGS,HELP,HELPFILTER,HIDE,HOURS,ID,IF,IMPORT,I' +
  91.             'NDEX,INDEXES,INPUT,INSERT,INTENSITY,JOIN,KEY,KEYBOARD,KEYCOMP,LA' +
  92.             'BEL,LIBRARY,LIST,LOAD,LOCAL,LOCATE,LOCK,LOGERRORS,LPARAMETERS,MA' +
  93.             'CDESKTOP,MACHELP,MACKEY,MACRO,MACROS,MARGIN,MARK,MD,MEMO,MEMORY,' +
  94.             'MEMOWIDTH,MENU,MENUS,MESSAGE,MKDIR,MODIFY,MODULE,MOUSE,MOVE,MULT' +
  95.             'ILOCKS,NEAR,NOCPTRANS,NOTE,NOTIFY,NULL,OBJECT,OBJECTS,ODOMETER,O' +
  96.             'F,OFF,OLEOBJECT,ON,OPEN,OPTIMIZE,or,ORDER,OTHERWISE,PACK,PAD,PAG' +
  97.             'E,PALETTE,PARAMETERS,PATH,PDSETUP,PLAY,POINT,POP,POPUP,POPUPS,PR' +
  98.             'INTER,PRINTJOB,PRIVATE,PROCEDURE,PROCEDURES,PROJECT,PUBLIC,PUSH,' +
  99.             'QUERY,QUIT,RD,READ,READBORDER,READERROR,RECALL,REFRESH,REGIONAL,' +
  100.             'REINDEX,RELATION,RELEASE,REMOVE,RENAME,REPLACE,REPORT,REPROCESS,' +
  101.             'RESOURCE,RESTORE,RESUME,RETRY,RETURN,RMDIR,ROLLBACK,RUN,RUNSCRIP' +
  102.             'T,s,SAFETY,SAVE,SCAN,SCATTER,SCHEME,SCOREBOARD,SCREEN,SCROLL,SEC' +
  103.             'ONDS,SEEK,SELECT,SELECTION,SEPARATOR,SET,SHADOWS,SHOW,SHUTDOWN,S' +
  104.             'IZE,SKIP,SORT,SPACE,SQL,STATUS,STEP,STICKY,STORE,string$,STRUCTU' +
  105.             'RE,SUM,SUSPEND,SYSFORMATS,SYSMENU,TABLE,TABLES,TAG,TALK,TEXTMERG' +
  106.             'E,TO,TOPIC,TOTAL,TRANSACTION,TRBETWEEN,TRIGGER,TYPE,TYPEAHEAD,UD' +
  107.             'FPARMS,UNIQUE,UNLOCK,UPDATE,USE,VALIDATE,VIEW,VIEWS,VOLUME,WAIT,' +
  108.             'WHILE,WINDOW,WINDOWS,WITH,XCMDFILE,ZAP,ZOOM'
  109.         end
  110.         item
  111.           FontID = 13
  112.           Name = 'Logical'
  113.           Keywords = '.AND.,.F.,.N.,.NOT.,.NULL.,.OR.,.T.,.Y.'
  114.         end>
  115.     end>
  116.   P.FontTable = <
  117.     item
  118.       FontID = 0
  119.       GlobalAttrID = 'Whitespace'
  120.       Font.Charset = DEFAULT_CHARSET
  121.       Font.Color = clBlack
  122.       Font.Height = -13
  123.       Font.Name = 'Courier New'
  124.       Font.Style = []
  125.     end
  126.     item
  127.       FontID = 1
  128.       GlobalAttrID = 'Integer'
  129.       Font.Charset = DEFAULT_CHARSET
  130.       Font.Color = clGreen
  131.       Font.Height = -13
  132.       Font.Name = 'Courier New'
  133.       Font.Style = []
  134.     end
  135.     item
  136.       FontID = 2
  137.       GlobalAttrID = 'Float'
  138.       Font.Charset = DEFAULT_CHARSET
  139.       Font.Color = clGreen
  140.       Font.Height = -13
  141.       Font.Name = 'Courier New'
  142.       Font.Style = []
  143.     end
  144.     item
  145.       FontID = 3
  146.       GlobalAttrID = 'Integer'
  147.       Font.Charset = DEFAULT_CHARSET
  148.       Font.Color = clGreen
  149.       Font.Height = -13
  150.       Font.Name = 'Courier New'
  151.       Font.Style = []
  152.     end
  153.     item
  154.       FontID = 4
  155.       GlobalAttrID = 'Defines'
  156.       Font.Charset = DEFAULT_CHARSET
  157.       Font.Color = clGreen
  158.       Font.Height = -13
  159.       Font.Name = 'Courier New'
  160.       Font.Style = [fsBold]
  161.     end
  162.     item
  163.       FontID = 5
  164.       GlobalAttrID = 'Comment'
  165.       Font.Charset = DEFAULT_CHARSET
  166.       Font.Color = clGray
  167.       Font.Height = -13
  168.       Font.Name = 'Courier New'
  169.       Font.Style = [fsItalic]
  170.     end
  171.     item
  172.       FontID = 6
  173.       GlobalAttrID = 'Comment'
  174.       Font.Charset = DEFAULT_CHARSET
  175.       Font.Color = clGray
  176.       Font.Height = -13
  177.       Font.Name = 'Courier New'
  178.       Font.Style = [fsItalic]
  179.     end
  180.     item
  181.       FontID = 7
  182.       GlobalAttrID = 'Comment'
  183.       Font.Charset = DEFAULT_CHARSET
  184.       Font.Color = clGray
  185.       Font.Height = -13
  186.       Font.Name = 'Courier New'
  187.       Font.Style = [fsItalic]
  188.     end
  189.     item
  190.       FontID = 8
  191.       GlobalAttrID = 'Comment'
  192.       Font.Charset = DEFAULT_CHARSET
  193.       Font.Color = clPurple
  194.       Font.Height = -13
  195.       Font.Name = 'Courier New'
  196.       Font.Style = []
  197.     end
  198.     item
  199.       FontID = 9
  200.       GlobalAttrID = 'Comment'
  201.       Font.Charset = DEFAULT_CHARSET
  202.       Font.Color = clPurple
  203.       Font.Height = -13
  204.       Font.Name = 'Courier New'
  205.       Font.Style = []
  206.     end
  207.     item
  208.       FontID = 10
  209.       GlobalAttrID = 'String'
  210.       Font.Charset = DEFAULT_CHARSET
  211.       Font.Color = clMaroon
  212.       Font.Height = -13
  213.       Font.Name = 'Courier New'
  214.       Font.Style = []
  215.     end
  216.     item
  217.       FontID = 11
  218.       GlobalAttrID = 'String'
  219.       Font.Charset = DEFAULT_CHARSET
  220.       Font.Color = clMaroon
  221.       Font.Height = -13
  222.       Font.Name = 'Courier New'
  223.       Font.Style = []
  224.     end
  225.     item
  226.       FontID = 15
  227.       GlobalAttrID = 'Reserved words'
  228.       Font.Charset = DEFAULT_CHARSET
  229.       Font.Color = clBlue
  230.       Font.Height = -13
  231.       Font.Name = 'Courier New'
  232.       Font.Style = [fsBold]
  233.     end
  234.     item
  235.       FontID = 13
  236.       GlobalAttrID = 'Reserved words'
  237.       Font.Charset = DEFAULT_CHARSET
  238.       Font.Color = clBlue
  239.       Font.Height = -13
  240.       Font.Name = 'Courier New'
  241.       Font.Style = [fsBold]
  242.     end
  243.     item
  244.       FontID = 14
  245.       GlobalAttrID = 'Delimiters'
  246.       Font.Charset = DEFAULT_CHARSET
  247.       Font.Color = clBlack
  248.       Font.Height = -13
  249.       Font.Name = 'Courier New'
  250.       Font.Style = []
  251.     end>
  252.   P.SyntaxVersion = 3
  253. end